! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
! 
! Sparse Stoichiometric Data Structures File
! 
! Generated by KPP-2.2.3 symbolic chemistry Kinetics PreProcessor
!       (http://www.cs.vt.edu/~asandu/Software/KPP)
! KPP is distributed under GPL, the general public licence
!       (http://www.gnu.org/copyleft/gpl.html)
! (C) 1995-1997, V. Damian & A. Sandu, CGRER, Univ. Iowa
! (C) 1997-2005, A. Sandu, Michigan Tech, Virginia Tech
!     With important contributions from:
!        M. Damian, Villanova University, USA
!        R. Sander, Max-Planck Institute for Chemistry, Mainz, Germany
! 
! File                 : aromatics_kpp_StoichiomSP.f90
! Time                 : Mon Nov 23 18:26:23 2020
! Working directory    : /n/home08/kbates/Aromatics/CRI_chamber
! Equation file        : aromatics_kpp.kpp
! Output root filename : aromatics_kpp
! 
! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



MODULE aromatics_kpp_StoichiomSP

  USE aromatics_kpp_Precision
  PUBLIC
  SAVE


! Row-compressed sparse data for the Jacobian of reaction products JVRP

  INTEGER, PARAMETER, DIMENSION(360) :: CROW_JVRP_0 = (/ &
       1,  2,  4,  6,  8, 10, 11, 13, 15, 16, 18, 20, &
      22, 23, 25, 27, 29, 31, 33, 34, 36, 38, 40, 42, &
      44, 46, 48, 50, 52, 53, 54, 55, 56, 57, 58, 59, &
      60, 61, 62, 63, 64, 65, 67, 69, 71, 72, 73, 75, &
      76, 78, 80, 82, 84, 86, 88, 89, 90, 91, 92, 93, &
      95, 97, 99,101,103,105,106,108,110,112,114,116, &
     118,120,122,124,126,128,130,132,134,135,137,139, &
     140,142,144,146,148,150,152,154,156,158,160,162, &
     164,166,168,170,172,174,176,177,179,181,183,185, &
     187,189,190,192,194,195,196,198,200,202,204,206, &
     208,210,212,214,216,218,220,222,224,226,228,230, &
     232,234,236,238,240,242,244,246,247,249,251,253, &
     255,257,259,261,263,265,266,267,269,271,273,275, &
     277,279,281,283,285,287,289,291,293,295,297,299, &
     301,303,305,307,309,311,313,315,317,319,321,323, &
     325,327,329,331,333,335,337,339,341,343,345,347, &
     349,351,353,355,357,359,361,363,365,367,369,371, &
     373,375,377,379,381,383,385,387,389,391,393,395, &
     397,399,401,403,404,406,408,410,412,414,416,417, &
     419,421,423,425,427,429,431,433,435,437,439,441, &
     443,445,447,449,451,453,455,457,459,461,463,465, &
     467,469,471,473,475,477,479,481,483,485,487,489, &
     491,493,495,497,499,501,503,505,507,509,511,513, &
     514,516,518,520,522,524,526,528,530,532,534,536, &
     538,540,542,543,544,546,548,550,551,552,554,556, &
     558,559,561,563,565,566,568,570,572,573,574,576, &
     578,580,581,582,584,586,588,589,590,592,594,596, &
     598,600,602,603,604,605,606,607,608,609,610,611, &
     612,613,614,615,616,617,618,619,620,621,622,623, &
     624,625,626,627,628,629,630,631,632,633,634,635 /)
  INTEGER, PARAMETER, DIMENSION(194) :: CROW_JVRP_1 = (/ &
     636,637,638,639,640,641,642,643,644,645,646,647, &
     648,649,651,653,655,657,659,660,662,664,666,668, &
     670,672,673,674,676,678,680,682,684,686,688,690, &
     691,693,695,697,699,700,702,704,706,708,709,711, &
     713,715,716,718,719,721,723,724,725,727,729,730, &
     732,733,735,737,738,739,741,743,744,746,747,749, &
     751,752,753,755,756,758,760,762,763,764,766,768, &
     769,771,773,775,777,779,780,781,783,785,787,789, &
     791,793,795,796,798,800,802,804,805,807,809,811, &
     813,814,816,817,819,820,822,824,826,827,829,831, &
     832,834,835,837,838,839,841,842,843,845,846,848, &
     850,851,853,855,856,857,859,861,863,865,866,868, &
     870,872,874,876,877,879,881,882,884,885,887,889, &
     891,892,894,896,897,899,900,902,903,905,907,909, &
     910,912,914,915,917,919,921,922,924,925,927,929, &
     930,932,934,935,937,939,941,943,944,946,948,949, &
     951,952 /)
  INTEGER, PARAMETER, DIMENSION(554) :: CROW_JVRP = (/&
    CROW_JVRP_0, CROW_JVRP_1 /)

  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_JVRP_0 = (/ &
      78, 78,193, 78,189, 78,192, 78,192, 19,189,193, &
     192,193,189,189,195,192,195,192,195, 19,193,197, &
      56,197, 82,197,193,196,196,197,196,189,197,192, &
     197,195,197,189,196,192,196, 63,197,195,196, 28, &
     197,145,197,193,193, 82,192,195,195, 28,145,195, &
      22, 63, 22, 63, 30,197,189,190,190,196,190,190, &
     190,192, 50, 52,197, 52,197,174,197,174,195,152, &
     197,194,197, 52,174,174, 50, 50, 90,197, 90,197, &
      96,197,177,197,177,195,191,192, 76,189,191, 41, &
     197,170,189, 20,197, 20,197,144,189,159,189, 40, &
     197,183,189,183,189,172,189,166,189,167,189,184, &
     189,184,169,189,179,189,179,161,189,154,189,181, &
     189,181,195,176,195,163,195,163,189,163,192,163, &
     196,153,195,153,189,153,196,153,190,176,193,176, &
     197,148,189,148,196,148,190,181,156,189, 40,195, &
     185,197,137,197,187,197,171,192, 24, 51,192,175, &
     192,129,113,171,189,175,189,187,195,115,197,144, &
     190,159,190,183,196,172,196,166,196,167,196,184, &
     196,169,196,179,196,161,196,154,196,181,196,156, &
     196,188,197,170,190,188,195,183,190,172,190,166, &
     190,167,190,184,190,184,173,190,169,190,179,190, &
     161,190,154,190,181,190,156,190, 66,197,120,197, &
     170,170,170,196,144,196,159,196,191,196,171,196, &
     175,196,143,197,143,193,113,197,129,197,113,193, &
       1,197,165,197,165,197,143,195,155,197,178,197, &
     155,195,178,195,142,197,197,198,186,197,182,197, &
     182,197,144,191,159,191,144,191,159,191,142,193, &
     193,198,186,193,142,195,186,195,186,195,171,190, &
     175,190,171,190,175,190,112,197,112,197, 81,197, &
      53,197, 54,197, 55,197, 84,197, 77,197, 80,197 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_JVRP_1 = (/ &
     102,197, 92,197,103,197,102,197, 92,197,103,197, &
       2,197, 31,197, 32,197, 29,197,151,196,151,189, &
      95,197, 93,197, 97,197, 97,197,108,197,108,197, &
     164,191,164,191,164,190,164,164,196,164,189,164, &
     189, 42,197, 41,195,180,193,191,190,191,190,191, &
     183,191,166,191,167,191,184,191,173,191,169,191, &
     179,191,154,191,172,191,161,191,181,191,156,191, &
     183,191,166,191,167,191,184,191,173,191,169,191, &
     179,191,172,191,161,191,181,191,156,191,154,191, &
     170,191,170,191,171,191,175,191,134,193,168,193, &
     180,197,173,189,173,189,173,196,168,197,134,197, &
     157,189,157,196,162,189,162,196,104,197,147,197, &
     158,197,126,189,126,196,126,192, 23,101,197,123, &
     189,123,189,123,196,100,197,122,189,122,189,122, &
     196,100,193,109,197,160,197,141,194,141,189,141, &
     192,141,141,133,194,133,189,133,192,133,133,110, &
     194,110,189,110,192,110,121,194,121,189,121,192, &
     121,127,194,127,189,127,192,127,127,119,194,119, &
     189,119,192,119,119,114,194,114,189,114,192,114, &
     114, 98,197, 87,197, 91,189, 94,189, 91,196, 94, &
     196, 91, 91,177, 76,187,115,115,188,165,155,155, &
     155,178,198,198,198,186,182,112, 81, 53, 54, 55, &
      84, 80, 77,102, 92,103, 95,104, 93, 97,108,185, &
      42,158,147,134,168,160, 90,129,109, 21, 87,176, &
      26,197, 25,197, 27,197,105,189,105,196,105,105, &
     189,105,195, 38,197, 38,195,116,189,116,196,116, &
     116,116,189,116,189,116,195,116,195, 33,197, 33, &
     195,135,189,135,196,135,135,189,135,195,130,189, &
     130,196,130,130,189,130,195,136,189,136,196,136, &
     136,189,136,195, 72,197, 72, 60,197, 60,106,197 /)
  INTEGER, PARAMETER, DIMENSION(231) :: ICOL_JVRP_2 = (/ &
     106,197,106,106, 39,192, 69,197, 69, 64,197, 64, &
     117,197,117,197,117,117, 34,192, 99,197, 99, 89, &
     197, 89,107,197,107,197,107,107, 45,197, 45, 37, &
     197, 70,197, 70,195,146,146,146,189,146,196,146, &
     146,189,146,195, 71,197, 71,195,150,189,150,150, &
     150,196,150,189,150,189,150,195,150,195,140,189, &
     140,196,140,140,189,140,195,131,189,131,196,131, &
     131,189,131,195,131,195,131,189,131,111,197,111, &
      75,197, 75, 35,197, 35,197,132,197,132,132,195, &
      57,197, 57, 48,197, 48, 83,197, 83, 83, 73,197, &
      73, 73, 88,197, 88, 44,197, 68,197, 68, 49,197, &
      59,197, 59,139,139,192,139,196,139,189,139,195, &
     149,149,189,149,196,149,189,149,195,124,196,124, &
     124,189,124,195, 74, 74,197, 46, 46,197,125,189, &
     125,196,125,125,189,125,195, 58, 58,197, 47, 47, &
     197, 65, 65,197, 61,197, 85,197, 85,128,189,128, &
     196,128,128,189,128,195, 79,197, 79,138,196,138, &
     138,189,138,195, 67, 67,197, 36,197, 36,118,189, &
     118,196,118,195,118,189,118, 43,197, 62,197, 62, &
      86,197, 86 /)
  INTEGER, PARAMETER, DIMENSION(951) :: ICOL_JVRP = (/&
    ICOL_JVRP_0, ICOL_JVRP_1, ICOL_JVRP_2 /)

  INTEGER, PARAMETER, DIMENSION(360) :: IROW_JVRP_0 = (/ &
       1,  2,  2,  3,  3,  4,  4,  5,  5,  6,  7,  7, &
       8,  8,  9, 10, 10, 11, 11, 12, 12, 13, 14, 14, &
      15, 15, 16, 16, 17, 17, 18, 18, 19, 20, 20, 21, &
      21, 22, 22, 23, 23, 24, 24, 25, 25, 26, 26, 27, &
      27, 28, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, &
      38, 39, 40, 41, 42, 42, 43, 43, 44, 44, 45, 46, &
      47, 47, 48, 49, 49, 50, 50, 51, 51, 52, 52, 53, &
      53, 54, 54, 55, 56, 57, 58, 59, 60, 60, 61, 61, &
      62, 62, 63, 63, 64, 64, 65, 65, 66, 67, 67, 68, &
      68, 69, 69, 70, 70, 71, 71, 72, 72, 73, 73, 74, &
      74, 75, 75, 76, 76, 77, 77, 78, 78, 79, 79, 80, &
      80, 81, 82, 82, 83, 83, 84, 85, 85, 86, 86, 87, &
      87, 88, 88, 89, 89, 90, 90, 91, 91, 92, 92, 93, &
      93, 94, 94, 95, 95, 96, 96, 97, 97, 98, 98, 99, &
      99,100,100,101,101,102,102,103,104,104,105,105, &
     106,106,107,107,108,108,109,109,110,111,111,112, &
     112,113,114,115,115,116,116,117,117,118,118,119, &
     119,120,120,121,121,122,122,123,123,124,124,125, &
     125,126,126,127,127,128,128,129,129,130,130,131, &
     131,132,132,133,133,134,134,135,135,136,136,137, &
     137,138,138,139,139,140,141,141,142,142,143,143, &
     144,144,145,145,146,146,147,147,148,148,149,149, &
     150,151,152,152,153,153,154,154,155,155,156,156, &
     157,157,158,158,159,159,160,160,161,161,162,162, &
     163,163,164,164,165,165,166,166,167,167,168,168, &
     169,169,170,170,171,171,172,172,173,173,174,174, &
     175,175,176,176,177,177,178,178,179,179,180,180, &
     181,181,182,182,183,183,184,184,185,185,186,186, &
     187,187,188,188,189,189,190,190,191,191,192,192, &
     193,193,194,194,195,195,196,196,197,197,198,198 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_JVRP_1 = (/ &
     199,199,200,200,201,201,202,202,203,203,204,204, &
     205,205,206,206,207,207,208,208,209,209,210,210, &
     211,211,212,212,213,213,214,214,215,215,216,216, &
     217,217,218,218,219,219,220,221,221,222,222,223, &
     223,224,224,225,225,226,226,227,228,228,229,229, &
     230,230,231,231,232,232,233,233,234,234,235,235, &
     236,236,237,237,238,238,239,239,240,240,241,241, &
     242,242,243,243,244,244,245,245,246,246,247,247, &
     248,248,249,249,250,250,251,251,252,252,253,253, &
     254,254,255,255,256,256,257,257,258,258,259,259, &
     260,260,261,261,262,262,263,263,264,264,265,265, &
     266,266,267,267,268,268,269,269,270,270,271,271, &
     272,272,273,273,274,274,275,275,276,277,277,278, &
     278,279,279,280,280,281,281,282,282,283,283,284, &
     284,285,285,286,286,287,287,288,288,289,289,290, &
     290,291,292,293,293,294,294,295,295,296,297,298, &
     298,299,299,300,300,301,302,302,303,303,304,304, &
     305,306,306,307,307,308,308,309,310,311,311,312, &
     312,313,313,314,315,316,316,317,317,318,318,319, &
     320,321,321,322,322,323,323,324,324,325,325,326, &
     326,327,328,329,330,331,332,333,334,335,336,337, &
     338,339,340,341,342,343,344,345,346,347,348,349, &
     350,351,352,353,354,355,356,357,358,359,360,361, &
     362,363,364,365,366,367,368,369,370,371,372,373, &
     374,374,375,375,376,376,377,377,378,378,379,380, &
     380,381,381,382,382,383,383,384,384,385,385,386, &
     387,388,388,389,389,390,390,391,391,392,392,393, &
     393,394,394,395,395,396,397,397,398,398,399,399, &
     400,400,401,402,402,403,403,404,404,405,405,406, &
     407,407,408,408,409,409,410,411,411,412,413,413 /)
  INTEGER, PARAMETER, DIMENSION(231) :: IROW_JVRP_2 = (/ &
     414,414,415,416,417,417,418,418,419,420,420,421, &
     422,422,423,423,424,425,426,426,427,427,428,429, &
     429,430,431,431,432,432,433,434,435,435,436,437, &
     437,438,438,439,439,440,441,442,442,443,443,444, &
     445,445,446,446,447,447,448,448,449,449,450,451, &
     452,452,453,453,454,454,455,455,456,456,457,457, &
     458,458,459,460,460,461,461,462,462,463,463,464, &
     465,465,466,466,467,467,468,468,469,470,470,471, &
     472,472,473,474,474,475,475,476,476,477,478,478, &
     479,479,480,481,481,482,483,483,484,485,486,486, &
     487,488,489,489,490,491,491,492,492,493,494,494, &
     495,495,496,497,498,498,499,499,500,500,501,501, &
     502,503,503,504,504,505,505,506,506,507,507,508, &
     509,509,510,510,511,512,512,513,514,514,515,515, &
     516,516,517,518,518,519,519,520,521,521,522,523, &
     523,524,525,525,526,526,527,527,528,529,529,530, &
     530,531,532,532,533,533,534,534,535,536,536,537, &
     538,538,539,539,540,541,541,542,542,543,544,544, &
     545,545,546,546,547,547,548,549,549,550,550,551, &
     552,552,553 /)
  INTEGER, PARAMETER, DIMENSION(951) :: IROW_JVRP = (/&
    IROW_JVRP_0, IROW_JVRP_1, IROW_JVRP_2 /)



!  Stoichiometric Matrix in Compressed Column Sparse Format


  INTEGER, PARAMETER, DIMENSION(360) :: CCOL_STOICM_0 = (/ &
       1,  3,  5,  8, 11, 14, 16, 19, 22, 24, 27, 29, &
      32, 34, 37, 40, 43, 46, 48, 50, 53, 56, 60, 64, &
      67, 70, 74, 77, 80, 82, 84, 86, 89, 91, 94, 97, &
     100,102,105,110,113,116,119,124,127,130,133,136, &
     139,142,144,149,154,158,162,166,170,174,178,181, &
     184,187,191,197,201,204,207,212,215,220,223,226, &
     231,237,240,252,255,261,266,272,283,286,295,304, &
     308,316,321,330,339,344,351,358,362,369,375,381, &
     385,394,402,406,412,416,424,433,438,442,445,449, &
     452,455,458,461,464,467,470,474,482,486,489,496, &
     505,508,511,517,523,532,542,545,554,557,560,563, &
     566,573,577,590,600,609,618,627,635,647,657,665, &
     674,681,692,701,705,709,712,715,718,721,724,731, &
     738,746,749,760,765,774,779,780,789,792,795,799, &
     803,808,813,817,820,824,829,835,840,846,850,855, &
     870,881,891,895,898,906,911,916,920,924,927,931, &
     935,939,943,947,951,954,958,963,968,973,979,982, &
     987,988,991,994,997,1009,1023,1027,1031,1034,1037,1040, &
     1043,1049,1053,1061,1065,1070,1076,1079,1082,1086,1097,1099, &
     1102,1106,1117,1120,1123,1133,1145,1152,1160,1165,1173,1183, &
     1193,1199,1203,1208,1212,1216,1220,1224,1228,1233,1238,1243, &
     1248,1252,1257,1261,1265,1268,1280,1295,1298,1310,1313,1319, &
     1324,1330,1343,1354,1364,1374,1379,1386,1389,1399,1410,1413, &
     1416,1422,1430,1433,1441,1444,1450,1453,1459,1465,1470,1475, &
     1478,1482,1486,1489,1491,1494,1498,1502,1504,1507,1510,1514, &
     1518,1521,1524,1528,1532,1535,1538,1542,1546,1549,1552,1555, &
     1559,1563,1566,1568,1571,1575,1579,1582,1584,1591,1600,1606, &
     1612,1615,1618,1622,1624,1629,1634,1638,1641,1644,1649,1655, &
     1658,1661,1664,1668,1671,1676,1679,1684,1688,1693,1698,1702, &
     1706,1710,1714,1719,1723,1731,1739,1747,1755,1760,1767,1773 /)
  INTEGER, PARAMETER, DIMENSION(194) :: CCOL_STOICM_1 = (/ &
     1777,1788,1791,1798,1802,1806,1810,1815,1819,1826,1831,1835, &
     1843,1851,1858,1865,1871,1874,1877,1883,1891,1899,1902,1906, &
     1909,1912,1918,1924,1932,1940,1948,1956,1959,1963,1966,1969, &
     1975,1983,1991,1994,1997,2003,2011,2019,2022,2025,2031,2039, &
     2047,2054,2061,2066,2073,2076,2080,2083,2086,2089,2096,2103, &
     2108,2115,2118,2122,2125,2129,2132,2139,2146,2151,2158,2161, &
     2165,2168,2172,2175,2177,2180,2184,2189,2191,2193,2196,2199, &
     2202,2207,2212,2216,2221,2224,2227,2230,2233,2238,2243,2248, &
     2253,2256,2259,2263,2269,2275,2278,2281,2284,2289,2294,2299, &
     2304,2307,2310,2314,2317,2321,2324,2328,2331,2335,2339,2343, &
     2347,2349,2353,2357,2361,2365,2367,2371,2375,2378,2381,2385, &
     2387,2392,2396,2398,2402,2404,2407,2410,2414,2418,2420,2423, &
     2426,2430,2434,2437,2440,2445,2450,2453,2458,2461,2464,2467, &
     2470,2473,2478,2483,2486,2490,2493,2495,2498,2501,2505,2507, &
     2512,2515,2518,2522,2528,2534,2537,2540,2543,2546,2551,2556, &
     2559,2561,2564,2567,2570,2573,2578,2583,2586,2590,2592,2596, &
     2601,2605 /)
  INTEGER, PARAMETER, DIMENSION(554) :: CCOL_STOICM = (/&
    CCOL_STOICM_0, CCOL_STOICM_1 /)

  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_0 = (/ &
      78,193, 78,193, 78,189,192, 78,189,192, 78,192, &
     195, 19, 78,189,192,193,192,193,195,189,192,189, &
     192,195,189,195, 22,192,195, 19,197,193,196,197, &
      56,196,197, 82,196,197,193,196,197,196,197, 82, &
     196, 28,189,197,145,192,197,192,195,196,197,189, &
     192,196,197, 63,192,196, 63,192,197,192,195,196, &
     197, 28,192,197,145,195,197, 19,193, 78,193, 82, &
     197, 78,189,192,189,195, 78,192,195, 28,189,197, &
     145,192,197,192,195, 22,192,195, 63,192,195,196, &
     197, 22,192,195, 63,192,196, 30,190,197,174,189, &
     190,192,196, 52,190,196,152,174,190,174,190,196, &
      50,190,192, 50,190,192, 52,190,197, 52,174, 13, &
     174,194,196,197,145,174,194,195,196,152,174,196, &
     197,  3,194,196,197, 52,174,196,197, 13,174,194, &
     196, 13, 56,174,194, 50,174,195,196, 50,190,192, &
      90,166,197, 14, 90,178,  3, 96,196,197,174,177, &
     191,194,196,197,145,177,191,195, 76,191,192, 76, &
     191,192,  3,189,190,191,192, 41,170,197,170,177, &
     189,192,196, 20,154,197, 20,144,197,144,187,189, &
     192,196,159,174,177,189,192,196, 40,183,197,115, &
     144,154,170,177,183,187,188,189,190,192,196,183, &
     185,189,172,174,177,187,189,192,166,174,189,191, &
     192,167,177,185,189,191,192,123,134,168,174,180, &
     184,186,189,192,196,198, 87, 91,184,147,165,169, &
     174,178,189,191,192,196,158,174,178,179,182,189, &
     192,194,196,179,182,194,197,160,161,174,178,189, &
     192,194,197,115,154,189,192,196,174,176,180,181, &
     186,189,192,196,198,174,176,180,181,186,192,195, &
     196,198,145,153,163,176,195,  5,160,163,192,194, &
     195,196,  5,160,163,189,192,194,196,  5,129,163 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_1 = (/ &
     192,  5,  9, 77,163,192,193,196,  5,153,155,160, &
     192,195,  5,153,155,160,189,192,  5,112,153,196, &
       5,152,153,155,160,174,190,192,196,152,155,160, &
     174,176,192,193,196,148,163,176,197,  5,148,155, &
     160,189,196,  5,112,148,196,  5,148,152,155,160, &
     174,190,196,168,174,176,180,181,186,192,196,198, &
     156,174,177,189,192, 40,145,183,195,172,185,197, &
       3,137,190,197,171,187,197, 24,171,192, 24,171, &
     192, 51,129,192,113,175,192, 51,129,192,113,175, &
     192,170,171,189,192,  3,174,175,189,190,191,192, &
     194,145,171,187,195,115,166,197,120,144,152,174, &
     187,190,196,120,152,159,174,177,182,187,190,196, &
      84,183,196,172,185,196, 90,166,174,191,196,197, &
      90,167,177,191,196,197, 92,102,103,174,184,186, &
     196,197,198, 93,165,169,174,178,187,188,191,196, &
     197, 97,179,196,108,160,161,174,178,192,194,196, &
     197, 55,154,196,112,181,196, 81,156,196,167,188, &
     197, 66,152,170,174,177,190,196,145,167,188,195, &
     115,120,144,152,154,170,174,177,183,187,188,190, &
     196,120,152,172,174,177,183,187,190,192,196, 14, &
     152,166,174,178,182,190,191,196,120,152,167,174, &
     177,188,190,191,196,120,152,174,180,184,186,190, &
     196,198,123,174,180,184,186,194,196,198, 56,120, &
     152,165,173,174,178,182,188,190,194,196,120,152, &
     165,169,174,178,188,190,191,196,120,174,178,179, &
     182,190,194,196,160,161,174,178,185,190,192,194, &
     196,115,120,152,154,174,190,196,152,168,174,176, &
     180,181,186,190,192,196,198,120,152,156,174,177, &
     187,190,192,196, 66,177,196,197,120,187,196,197, &
     170,177,196, 66,170,177, 53,170,196, 54,144,196 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_2 = (/ &
      80,159,196, 42,137,190,191,193,196,197,  9, 77, &
     170,171,193,196,197,108,174,175,190,193,194,196, &
     197,143,159,197, 30,119,141,143,174,177,190,193, &
     194,196,197,113,182,192,194,197,  1, 76,129,174, &
     182,194,195,196,197,113,174,191,193,195,  1,  3, &
      12, 96,155,165,174,194,196,197, 96,165,194,143, &
     156,195,155,194,196,197,178,191,194,197,145,155, &
     194,195,196,145,178,191,194,195,  6,142,184,197, &
     169,197,198, 51,179,186,197, 14,178,182,196,197, &
       3, 96,137,182,190,194,144,187,190,191,196,159, &
     174,177,190,191,196,137,144,187,191,137,159,182, &
     187,191,110,133,141,142,143,169,174,186,190,191, &
     193,194,196,197,198,127,141,174,177,178,191,193, &
     194,196,197,198,121,141,174,178,186,191,193,194, &
     196,197,  7,142,181,195,161,186,195, 51,108,145, &
     179,186,194,195,196,170,171,174,190,196,174,175, &
     190,191,196,  9,171,174,190,  9,174,175,190,112, &
     188,192,112,181,185,197, 81,156,160,197, 53,170, &
     177,197, 54,144,187,197, 55,115,154,197, 84,183, &
     187,197, 77,171,197, 80,159,182,197,  2,102,180, &
     184,197,  2, 92,180,184,197,  2,103,180,184,197, &
       2, 31, 32,102,173,197, 31, 32, 92,  2, 29,103, &
     173,197,  2, 31,151,197, 32,151,197, 29,151,197, &
       3, 96, 98,151,155,165,174,178,182,194,196,197, &
       3, 96, 98,151,155,165,174,178,182,189,192,194, &
     196,197, 95,101,173,197, 93,169,188,197, 97,179, &
     197,  3, 97,182,108,175,197,108,164,197,  3,164, &
     182,190,191,197,137,164,188,191,  3,120,164,174, &
     182,190,196,197,  3,164,182,197,  3,164,182,196, &
     197,  3,164,182,189,192,197,145,164,189, 42,191 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_3 = (/ &
     197, 41,145,170,195,114,121,165,174,178,180,191, &
     193,194,196,197,190,191,174,191,196,137,174,190, &
     191,115,144,154,170,177,183,187,188,190,191,196, &
     166,174,190,167,177,190,  3,123,174,180,184,186, &
     190,191,196,198,100,101,155,165,173,178,182,187, &
     190,191,194,196,165,169,174,178,190,191,196,174, &
     178,179,182,190,191,194,196,115,154,190,191,196, &
     172,174,177,183,187,190,191,192,  3,160,161,174, &
     178,190,191,192,194,196,174,176,180,181,186,190, &
     191,192,196,198,156,174,177,190,191,192,137,183, &
     188,191, 14,137,166,178,191,137,167,188,191,137, &
     184,188,191,137,173,188,191,137,169,188,191,137, &
     179,188,191,137,172,187,191,192,137,161,187,191, &
     192,137,181,187,191,192,137,156,187,191,192,115, &
     137,154,191,170,177,190,191,196,137,170,177,191, &
     170,171,190,191,174,175,190,  3, 96,134,145,147, &
     158,160,174,193,194,196,197,  3, 66,109,145,152, &
     155,160,165,168,174,182,191,192,193,197,173,180, &
     197,100,101,155,165,173,178,182,187,189,192,194, &
     196,145,173,189, 95,165,173,178,196,197, 29,157, &
     168,192,197, 31, 32,134,162,192,197,  4, 96,109, &
     147,157,158,160,165,174,182,189,192,196,104,109, &
     147,157,158,160,165,174,182,196,197,  4,147,158, &
     162,165,174,182,189,192,196,104,147,158,162,165, &
     174,182,192,196,197,104,157,162,172,197,  8, 96, &
     147,174,178,195,197,126,158,197,  3, 96,126,137, &
     174,178,182,189,192,195,  3, 96,126,137,174,178, &
     182,192,195,196,197, 23,126,192, 23,126,192,101, &
     182,188,194,196,197,123,155,165,178,182,189,192, &
     196,123,145,189, 84,123,155,165,178,182,196,197 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_4 = (/ &
     100,122,197,  3,122,187,189,192,196,122,145,189, &
       3, 84,122,187,196,197,  3,100,188,193,196,197, &
       3,109,174,192,197, 14,160,178,192,197,141,174, &
     194,141,174,189,192,141,174,192,195, 82,141,174, &
      96,141,133,186,194,133,186,189,192,133,186,192, &
     195, 97,133, 82,133,186,110,194,198,110,189,192, &
     198,110,192,195,198, 82,110,198,121,178,194,121, &
     178,189,192,121,178,192,195, 82,121,178,127,178, &
     194,127,178,189,192,127,178,192,195,127,190,191, &
      82,127,178,119,177,194,119,177,189,192,119,177, &
     192,195, 82,119,177,119,137,114,165,194,114,165, &
     189,192,114,165,192,195, 82,114,165,114,182, 98, &
     174,178,191,194,196,197,  3, 87, 94,155,174,178, &
     191,194,197, 91,155,178,189,192,197, 94,155,178, &
     189,192,197,  9, 91,196,  9, 94,196,  9, 91,194, &
     197, 21, 91,177,190,191,194,196, 76,190,191,192, &
     195,170,187,194,196,115,190,191,115,190,194,170, &
     171,188,190,191,152,165,174,194,196,197,155,194, &
     196, 56,155,194,155,174,194,178,191,194,196,143, &
     194,198,174,191,194,196,198,171,190,198,174,186, &
     191,194,196,174,182,191,196,112,187,192,196,197, &
      81,187,192,196,197, 53,177,196,197, 54,187,196, &
     197, 55,115,196,197, 84,187,196,197, 80,174,177, &
     196,197, 77,177,196,197,  2,102,174,180,186,196, &
     197,198,  2, 92,174,180,186,196,197,198,  2,103, &
     174,180,186,196,197,198, 56, 95,165,178,182,194, &
     196,197,104,187,192,196,197, 93,165,174,178,191, &
     196,197, 97,174,182,194,196,197,108,174,191,197, &
     115,144,154,170,177,185,187,188,190,192,196, 42, &
     190,197,158,174,178,182,192,194,196,147,165,191 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_5 = (/ &
     192,134,180,192,196,168,180,192,196,160,174,190, &
     192,194, 90,174,191,197,  3, 51,129,174,191,192, &
     195,109,174,192,194,196, 21,155,178,197, 87,165, &
     178,182,191,194,196,197,155,165,174,176,178,182, &
     192,196, 11, 15, 26, 38,105,196,197, 10, 16, 25, &
      33,116,196,197, 11, 27,130,135,136,197, 72,105, &
     189, 60,105,196, 12, 17,105,106,155,196, 12, 17, &
     105,106,155,189,192,196, 12, 17,105,106,155,192, &
     195,196, 38, 39,197, 38, 39,145,195, 69,116,189, &
      64,116,196, 12, 17,116,117,155,196, 14, 17,106, &
     116,178,196, 12, 17,116,117,155,189,192,196, 14, &
      17,106,116,178,189,192,196, 12, 17,116,117,155, &
     192,195,196, 14, 17,106,116,178,192,195,196, 33, &
      34,197, 33, 34,145,195, 99,135,189, 89,135,196, &
      12, 17,107,135,155,196, 12, 17,107,135,155,189, &
     192,196, 12, 17,107,135,155,192,195,196, 99,130, &
     189, 89,130,196, 12, 17,107,130,155,196, 12, 17, &
     106,130,155,189,192,196, 12, 17,106,130,155,192, &
     195,196, 99,136,189, 89,136,196, 12, 17,107,136, &
     155,196, 14, 17,117,136,178,189,192,196, 14, 17, &
     117,136,178,192,195,196, 12, 17, 72,106,155,192, &
     197, 12, 17, 72,106,155,192,196, 12, 17, 60,106, &
     155, 12, 17, 60,106,155,196,197,106,170,197, 37, &
     106,196,197,106,170,196, 37,106,196, 39, 70,192, &
      12, 17, 69,117,155,192,197, 12, 17, 69,117,155, &
     192,196, 12, 17, 64,117,155, 12, 17, 64,117,155, &
     196,197,117,146,197, 37,117,190,197,117,146,196, &
      37,117,190,196, 34, 71,192, 14, 17, 99,117,178, &
     192,197, 14, 17, 99,117,178,192,196, 14, 17, 89, &
     117,178, 14, 17, 89,117,178,196,197,107,150,197 /)
  INTEGER, PARAMETER, DIMENSION(360) :: IROW_STOICM_6 = (/ &
      37,107,170,197,107,150,196, 37,107,170,196, 45, &
     140,197, 45,191, 37,131,197, 70,111,192,197, 70, &
     111,145,192,195, 35,146,132,146, 57,146,189, 48, &
     146,196,132,146,196,132,146,189,192,196,132,146, &
     192,195,196, 71, 75,192,197, 71, 75,145,192,195, &
      83,150,189,150,170,177, 88,150,196, 73,150,196, &
      88,150,189,192,196,150,170,177,189,192,150,170, &
     177,192,195, 88,150,192,195,196, 44,140,189, 68, &
     140,196,140,174,177,196,140,174,177,189,192,196, &
     140,174,177,192,195,196, 49,131,189, 59,131,196, &
     131,165,196,131,165,189,192,196,131,165,192,195, &
     196,131,174,192,195,196,131,174,189,192,196,131, &
     174,196,111,150,197,111,166,177,196, 75,149,197, &
      75,132,166,196, 35,140,197, 35,132,196,197,132, &
     139,197,132,170,194,196,132,139,145,195, 57,132, &
     192,197, 57,132,192,196, 48,132, 48,132,196,197, &
      83, 88,192,197, 83,170,177,192, 83, 88,192,196, &
      73, 88, 73,170,177,197, 73, 88,196,197, 88,124, &
     197, 88,170,191, 44,182,192,197, 68,182, 68,174, &
     177,196,197, 49,165,192,197, 59,165, 59,174,196, &
     197,139,170, 74,139,192, 46,139,196,139,170,189, &
     192,139,170,192,195,125,149, 58,149,189, 47,149, &
     196,125,149,189,192,125,149,192,195, 65,124,196, &
     124,177,191,124,177,189,191,192,124,177,191,192, &
     195, 74,139,192, 74,177,192,194,197, 46,170,197, &
      46,139,197, 61,125,189, 85,125,196,111,125,196, &
     111,125,189,192,196,111,125,192,195,196, 58,128, &
     192, 58, 79,192,197, 47,125,197, 47, 79, 65,146, &
     197, 18, 45, 65, 61,111,192,197, 85,111, 85,132, &
     177,196,197, 61,128,189, 85,128,196,128,132,177 /)
  INTEGER, PARAMETER, DIMENSION(84) :: IROW_STOICM_7 = (/ &
     196,128,132,177,189,192,196,128,132,177,192,195, &
     196, 79,138,197, 79,146,191, 67,138,196,138,139, &
     177,138,139,177,189,192,138,139,177,192,195, 67, &
     150,197, 36, 67, 36,118,197, 36,166,191, 43,118, &
     189, 62,118,196,118,177,192,195,196,118,177,189, &
     192,196,118,177,196, 43, 86,192,197, 62, 86, 62, &
     177,196,197, 18, 45, 86,196,197, 86,177,191,196 /)
  INTEGER, PARAMETER, DIMENSION(2604) :: IROW_STOICM = (/&
    IROW_STOICM_0, IROW_STOICM_1, IROW_STOICM_2, IROW_STOICM_3, IROW_STOICM_4, &
    IROW_STOICM_5, IROW_STOICM_6, IROW_STOICM_7 /)

  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_0 = (/ &
       1,  1,  2,  2,  3,  3,  3,  4,  4,  4,  5,  5, &
       5,  6,  6,  7,  7,  7,  8,  8,  8,  9,  9, 10, &
      10, 10, 11, 11, 12, 12, 12, 13, 13, 14, 14, 14, &
      15, 15, 15, 16, 16, 16, 17, 17, 17, 18, 18, 19, &
      19, 20, 20, 20, 21, 21, 21, 22, 22, 22, 22, 23, &
      23, 23, 23, 24, 24, 24, 25, 25, 25, 26, 26, 26, &
      26, 27, 27, 27, 28, 28, 28, 29, 29, 30, 30, 31, &
      31, 32, 32, 32, 33, 33, 34, 34, 34, 35, 35, 35, &
      36, 36, 36, 37, 37, 38, 38, 38, 39, 39, 39, 39, &
      39, 40, 40, 40, 41, 41, 41, 42, 42, 42, 43, 43, &
      43, 43, 43, 44, 44, 44, 45, 45, 45, 46, 46, 46, &
      47, 47, 47, 48, 48, 48, 49, 49, 49, 50, 50, 51, &
      51, 51, 51, 51, 52, 52, 52, 52, 52, 53, 53, 53, &
      53, 54, 54, 54, 54, 55, 55, 55, 55, 56, 56, 56, &
      56, 57, 57, 57, 57, 58, 58, 58, 58, 59, 59, 59, &
      60, 60, 60, 61, 61, 61, 62, 62, 62, 62, 63, 63, &
      63, 63, 63, 63, 64, 64, 64, 64, 65, 65, 65, 66, &
      66, 66, 67, 67, 67, 67, 67, 68, 68, 68, 69, 69, &
      69, 69, 69, 70, 70, 70, 71, 71, 71, 72, 72, 72, &
      72, 72, 73, 73, 73, 73, 73, 73, 74, 74, 74, 75, &
      75, 75, 75, 75, 75, 75, 75, 75, 75, 75, 75, 76, &
      76, 76, 77, 77, 77, 77, 77, 77, 78, 78, 78, 78, &
      78, 79, 79, 79, 79, 79, 79, 80, 80, 80, 80, 80, &
      80, 80, 80, 80, 80, 80, 81, 81, 81, 82, 82, 82, &
      82, 82, 82, 82, 82, 82, 83, 83, 83, 83, 83, 83, &
      83, 83, 83, 84, 84, 84, 84, 85, 85, 85, 85, 85, &
      85, 85, 85, 86, 86, 86, 86, 86, 87, 87, 87, 87, &
      87, 87, 87, 87, 87, 88, 88, 88, 88, 88, 88, 88, &
      88, 88, 89, 89, 89, 89, 89, 90, 90, 90, 90, 90, &
      90, 90, 91, 91, 91, 91, 91, 91, 91, 92, 92, 92 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_1 = (/ &
      92, 93, 93, 93, 93, 93, 93, 93, 94, 94, 94, 94, &
      94, 94, 95, 95, 95, 95, 95, 95, 96, 96, 96, 96, &
      97, 97, 97, 97, 97, 97, 97, 97, 97, 98, 98, 98, &
      98, 98, 98, 98, 98, 99, 99, 99, 99,100,100,100, &
     100,100,100,101,101,101,101,102,102,102,102,102, &
     102,102,102,103,103,103,103,103,103,103,103,103, &
     104,104,104,104,104,105,105,105,105,106,106,106, &
     107,107,107,107,108,108,108,109,109,109,110,110, &
     110,111,111,111,112,112,112,113,113,113,114,114, &
     114,115,115,115,115,116,116,116,116,116,116,116, &
     116,117,117,117,117,118,118,118,119,119,119,119, &
     119,119,119,120,120,120,120,120,120,120,120,120, &
     121,121,121,122,122,122,123,123,123,123,123,123, &
     124,124,124,124,124,124,125,125,125,125,125,125, &
     125,125,125,126,126,126,126,126,126,126,126,126, &
     126,127,127,127,128,128,128,128,128,128,128,128, &
     128,129,129,129,130,130,130,131,131,131,132,132, &
     132,133,133,133,133,133,133,133,134,134,134,134, &
     135,135,135,135,135,135,135,135,135,135,135,135, &
     135,136,136,136,136,136,136,136,136,136,136,137, &
     137,137,137,137,137,137,137,137,138,138,138,138, &
     138,138,138,138,138,139,139,139,139,139,139,139, &
     139,139,140,140,140,140,140,140,140,140,141,141, &
     141,141,141,141,141,141,141,141,141,141,142,142, &
     142,142,142,142,142,142,142,142,143,143,143,143, &
     143,143,143,143,144,144,144,144,144,144,144,144, &
     144,145,145,145,145,145,145,145,146,146,146,146, &
     146,146,146,146,146,146,146,147,147,147,147,147, &
     147,147,147,147,148,148,148,148,149,149,149,149, &
     150,150,150,151,151,151,152,152,152,153,153,153 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_2 = (/ &
     154,154,154,155,155,155,155,155,155,155,156,156, &
     156,156,156,156,156,157,157,157,157,157,157,157, &
     157,158,158,158,159,159,159,159,159,159,159,159, &
     159,159,159,160,160,160,160,160,161,161,161,161, &
     161,161,161,161,161,162,162,162,162,162,163,164, &
     164,164,164,164,164,164,164,164,165,165,165,166, &
     166,166,167,167,167,167,168,168,168,168,169,169, &
     169,169,169,170,170,170,170,170,171,171,171,171, &
     172,172,172,173,173,173,173,174,174,174,174,174, &
     175,175,175,175,175,175,176,176,176,176,176,177, &
     177,177,177,177,177,178,178,178,178,179,179,179, &
     179,179,180,180,180,180,180,180,180,180,180,180, &
     180,180,180,180,180,181,181,181,181,181,181,181, &
     181,181,181,181,182,182,182,182,182,182,182,182, &
     182,182,183,183,183,183,184,184,184,185,185,185, &
     185,185,185,185,185,186,186,186,186,186,187,187, &
     187,187,187,188,188,188,188,189,189,189,189,190, &
     190,190,191,191,191,191,192,192,192,192,193,193, &
     193,193,194,194,194,194,195,195,195,195,196,196, &
     196,196,197,197,197,198,198,198,198,199,199,199, &
     199,199,200,200,200,200,200,201,201,201,201,201, &
     202,202,202,202,202,202,203,203,203,204,204,204, &
     204,204,205,206,206,206,207,207,207,208,208,208, &
     209,209,209,209,209,209,209,209,209,209,209,209, &
     210,210,210,210,210,210,210,210,210,210,210,210, &
     210,210,211,211,211,211,212,212,212,212,213,213, &
     213,214,214,214,215,215,215,216,216,216,217,217, &
     217,217,217,217,218,218,218,218,219,219,219,219, &
     219,219,219,219,220,220,220,220,221,221,221,221, &
     221,222,222,222,222,222,222,223,223,223,224,224 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_3 = (/ &
     224,225,225,225,225,226,226,226,226,226,226,226, &
     226,226,226,226,227,227,228,228,228,229,229,229, &
     229,230,230,230,230,230,230,230,230,230,230,230, &
     231,231,231,232,232,232,233,233,233,233,233,233, &
     233,233,233,233,234,234,234,234,234,234,234,234, &
     234,234,234,234,235,235,235,235,235,235,235,236, &
     236,236,236,236,236,236,236,237,237,237,237,237, &
     238,238,238,238,238,238,238,238,239,239,239,239, &
     239,239,239,239,239,239,240,240,240,240,240,240, &
     240,240,240,240,241,241,241,241,241,241,242,242, &
     242,242,243,243,243,243,243,244,244,244,244,245, &
     245,245,245,246,246,246,246,247,247,247,247,248, &
     248,248,248,249,249,249,249,249,250,250,250,250, &
     250,251,251,251,251,251,252,252,252,252,252,253, &
     253,253,253,254,254,254,254,254,255,255,255,255, &
     256,256,256,256,257,257,257,258,258,258,258,258, &
     258,258,258,258,258,258,258,259,259,259,259,259, &
     259,259,259,259,259,259,259,259,259,259,260,260, &
     260,261,261,261,261,261,261,261,261,261,261,261, &
     261,262,262,262,263,263,263,263,263,263,264,264, &
     264,264,264,265,265,265,265,265,265,266,266,266, &
     266,266,266,266,266,266,266,266,266,266,267,267, &
     267,267,267,267,267,267,267,267,267,268,268,268, &
     268,268,268,268,268,268,268,269,269,269,269,269, &
     269,269,269,269,269,270,270,270,270,270,271,271, &
     271,271,271,271,271,272,272,272,273,273,273,273, &
     273,273,273,273,273,273,274,274,274,274,274,274, &
     274,274,274,274,274,275,275,275,276,276,276,277, &
     277,277,277,277,277,278,278,278,278,278,278,278, &
     278,279,279,279,280,280,280,280,280,280,280,280 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_4 = (/ &
     281,281,281,282,282,282,282,282,282,283,283,283, &
     284,284,284,284,284,284,285,285,285,285,285,285, &
     286,286,286,286,286,287,287,287,287,287,288,288, &
     288,289,289,289,289,290,290,290,290,291,291,291, &
     292,292,293,293,293,294,294,294,294,295,295,295, &
     295,296,296,297,297,297,298,298,298,299,299,299, &
     299,300,300,300,300,301,301,301,302,302,302,303, &
     303,303,303,304,304,304,304,305,305,305,306,306, &
     306,307,307,307,307,308,308,308,308,309,309,309, &
     310,310,310,311,311,311,312,312,312,312,313,313, &
     313,313,314,314,314,315,315,316,316,316,317,317, &
     317,317,318,318,318,318,319,319,319,320,320,321, &
     321,321,321,321,321,321,322,322,322,322,322,322, &
     322,322,322,323,323,323,323,323,323,324,324,324, &
     324,324,324,325,325,325,326,326,326,327,327,327, &
     327,328,328,329,329,329,329,329,330,330,330,330, &
     330,331,331,331,331,332,332,332,333,333,333,334, &
     334,334,334,334,335,335,335,335,335,335,336,336, &
     336,337,337,337,338,338,338,339,339,339,339,340, &
     340,340,341,341,341,341,341,342,342,342,343,343, &
     343,343,343,344,344,344,344,345,345,345,345,345, &
     346,346,346,346,346,347,347,347,347,348,348,348, &
     348,349,349,349,349,350,350,350,350,351,351,351, &
     351,351,352,352,352,352,353,353,353,353,353,353, &
     353,353,354,354,354,354,354,354,354,354,355,355, &
     355,355,355,355,355,355,356,356,356,356,356,356, &
     356,356,357,357,357,357,357,358,358,358,358,358, &
     358,358,359,359,359,359,359,359,360,360,360,360, &
     361,361,361,361,361,361,361,361,361,361,361,362, &
     362,362,363,363,363,363,363,363,363,364,364,364 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_5 = (/ &
     364,365,365,365,365,366,366,366,366,367,367,367, &
     367,367,368,368,368,368,369,369,369,369,369,369, &
     369,370,370,370,370,370,371,371,371,371,372,372, &
     372,372,372,372,372,372,373,373,373,373,373,373, &
     373,373,374,374,374,374,374,374,374,375,375,375, &
     375,375,375,375,376,376,376,376,376,376,377,377, &
     377,378,378,378,379,379,379,379,379,379,380,380, &
     380,380,380,380,380,380,381,381,381,381,381,381, &
     381,381,382,382,382,383,383,383,383,384,384,384, &
     385,385,385,386,386,386,386,386,386,387,387,387, &
     387,387,387,388,388,388,388,388,388,388,388,389, &
     389,389,389,389,389,389,389,390,390,390,390,390, &
     390,390,390,391,391,391,391,391,391,391,391,392, &
     392,392,393,393,393,393,394,394,394,395,395,395, &
     396,396,396,396,396,396,397,397,397,397,397,397, &
     397,397,398,398,398,398,398,398,398,398,399,399, &
     399,400,400,400,401,401,401,401,401,401,402,402, &
     402,402,402,402,402,402,403,403,403,403,403,403, &
     403,403,404,404,404,405,405,405,406,406,406,406, &
     406,406,407,407,407,407,407,407,407,407,408,408, &
     408,408,408,408,408,408,409,409,409,409,409,409, &
     409,410,410,410,410,410,410,410,411,411,411,411, &
     411,412,412,412,412,412,412,412,413,413,413,414, &
     414,414,414,415,415,415,416,416,416,417,417,417, &
     418,418,418,418,418,418,418,419,419,419,419,419, &
     419,419,420,420,420,420,420,421,421,421,421,421, &
     421,421,422,422,422,423,423,423,423,424,424,424, &
     425,425,425,425,426,426,426,427,427,427,427,427, &
     427,427,428,428,428,428,428,428,428,429,429,429, &
     429,429,430,430,430,430,430,430,430,431,431,431 /)
  INTEGER, PARAMETER, DIMENSION(360) :: ICOL_STOICM_6 = (/ &
     432,432,432,432,433,433,433,434,434,434,434,435, &
     435,435,436,436,437,437,437,438,438,438,438,439, &
     439,439,439,439,440,440,441,441,442,442,442,443, &
     443,443,444,444,444,445,445,445,445,445,446,446, &
     446,446,446,447,447,447,447,448,448,448,448,448, &
     449,449,449,450,450,450,451,451,451,452,452,452, &
     453,453,453,453,453,454,454,454,454,454,455,455, &
     455,455,455,456,456,456,456,456,457,457,457,458, &
     458,458,459,459,459,459,460,460,460,460,460,460, &
     461,461,461,461,461,461,462,462,462,463,463,463, &
     464,464,464,465,465,465,465,465,466,466,466,466, &
     466,467,467,467,467,467,468,468,468,468,468,469, &
     469,469,470,470,470,471,471,471,471,472,472,472, &
     473,473,473,473,474,474,474,475,475,475,475,476, &
     476,476,477,477,477,477,478,478,478,478,479,479, &
     479,479,480,480,480,480,481,481,482,482,482,482, &
     483,483,483,483,484,484,484,484,485,485,485,485, &
     486,486,487,487,487,487,488,488,488,488,489,489, &
     489,490,490,490,491,491,491,491,492,492,493,493, &
     493,493,493,494,494,494,494,495,495,496,496,496, &
     496,497,497,498,498,498,499,499,499,500,500,500, &
     500,501,501,501,501,502,502,503,503,503,504,504, &
     504,505,505,505,505,506,506,506,506,507,507,507, &
     508,508,508,509,509,509,509,509,510,510,510,510, &
     510,511,511,511,512,512,512,512,512,513,513,513, &
     514,514,514,515,515,515,516,516,516,517,517,517, &
     518,518,518,518,518,519,519,519,519,519,520,520, &
     520,521,521,521,521,522,522,522,523,523,524,524, &
     524,525,525,525,526,526,526,526,527,527,528,528, &
     528,528,528,529,529,529,530,530,530,531,531,531 /)
  INTEGER, PARAMETER, DIMENSION(84) :: ICOL_STOICM_7 = (/ &
     531,532,532,532,532,532,532,533,533,533,533,533, &
     533,534,534,534,535,535,535,536,536,536,537,537, &
     537,538,538,538,538,538,539,539,539,539,539,540, &
     540,540,541,541,542,542,542,543,543,543,544,544, &
     544,545,545,545,546,546,546,546,546,547,547,547, &
     547,547,548,548,548,549,549,549,549,550,550,551, &
     551,551,551,552,552,552,552,552,553,553,553,553 /)
  INTEGER, PARAMETER, DIMENSION(2604) :: ICOL_STOICM = (/&
    ICOL_STOICM_0, ICOL_STOICM_1, ICOL_STOICM_2, ICOL_STOICM_3, ICOL_STOICM_4, &
    ICOL_STOICM_5, ICOL_STOICM_6, ICOL_STOICM_7 /)

  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_0 = (/ &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp, &
       -2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       9.500000e-01_dp,  5.000000e-02_dp,  9.500000e-01_dp,  5.000000e-02_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp, &
       -2.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_1 = (/ &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       5.000000e-02_dp,  -1.000000e+00_dp,  9.500000e-01_dp,  5.000000e-02_dp,  5.000000e-02_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  3.200000e-01_dp, &
       5.000000e-02_dp,  1.800000e-01_dp,  3.200000e-01_dp,  3.200000e-01_dp,  -1.000000e+00_dp, &
       1.400000e-01_dp,  1.900000e-01_dp,  -1.000000e+00_dp,  1.900000e-01_dp,  1.000000e+00_dp, &
       2.700000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       5.700000e-01_dp,  8.600000e-01_dp,  5.700000e-01_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  9.300000e-01_dp,  7.000000e-02_dp,  -1.000000e+00_dp,  9.300000e-01_dp, &
       9.300000e-01_dp,  3.000000e-02_dp,  8.100000e-02_dp,  9.000000e-03_dp,  8.200000e-01_dp, &
       5.800000e-02_dp,  -1.000000e+00_dp,  3.440000e-01_dp,  -1.000000e+00_dp,  9.100000e-01_dp, &
       8.200000e-01_dp,  4.760000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       1.200000e-01_dp,  5.300000e-01_dp,  -1.000000e+00_dp,  3.500000e-01_dp,  3.500000e-01_dp, &
       -1.000000e+00_dp,  5.300000e-01_dp,  8.800000e-01_dp,  3.500000e-01_dp,  1.500000e-01_dp, &
       1.220000e-01_dp,  1.220000e-01_dp,  -1.000000e+00_dp,  7.280000e-01_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_2 = (/ &
       8.500000e-01_dp,  7.280000e-01_dp,  8.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  1.500000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       7.000000e-02_dp,  7.000000e-01_dp,  2.300000e-01_dp,  -1.000000e+00_dp,  3.500000e-02_dp, &
       -1.000000e+00_dp,  1.300000e+00_dp,  8.000000e-01_dp,  3.500000e-02_dp,  7.000000e-02_dp, &
       7.000000e-01_dp,  2.300000e-01_dp,  -1.000000e+00_dp,  3.500000e-02_dp,  1.300000e+00_dp, &
       -1.000000e+00_dp,  8.000000e-01_dp,  3.500000e-02_dp,  6.000000e-01_dp,  4.000000e-01_dp, &
       6.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  4.000000e-02_dp,  9.600000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  4.000000e-02_dp,  2.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp, &
       9.600000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  4.000000e-02_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  9.400000e-01_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  4.000000e-02_dp, &
       -1.000000e+00_dp,  9.400000e-01_dp,  9.000000e-01_dp,  -1.000000e+00_dp,  1.880000e+00_dp, &
       4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  4.000000e-02_dp, &
       2.500000e-01_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  6.600000e-01_dp,  7.500000e-01_dp, &
       -1.000000e+00_dp,  7.000000e-01_dp,  5.000000e-01_dp,  2.500000e-01_dp,  7.000000e-01_dp, &
       3.000000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  6.550000e-01_dp,  3.450000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       4.000000e-02_dp,  -1.000000e+00_dp,  9.190000e-01_dp,  8.940000e-01_dp,  -1.000000e+00_dp, &
       9.340000e-01_dp,  4.000000e-02_dp,  9.600000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       4.000000e-02_dp,  -1.000000e+00_dp,  2.500000e-01_dp,  7.000000e-01_dp,  6.600000e-01_dp, &
       7.500000e-01_dp,  -1.000000e+00_dp,  1.200000e+00_dp,  5.000000e-01_dp,  7.000000e-02_dp, &
       1.200000e+00_dp,  2.300000e-01_dp,  -2.000000e+00_dp,  3.500000e-02_dp,  3.000000e-01_dp, &
       8.000000e-01_dp,  3.500000e-02_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_3 = (/ &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp, &
       5.000000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.500000e-01_dp,  -1.000000e+00_dp, &
       2.500000e-01_dp,  7.500000e-01_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  1.250000e+00_dp,  5.000000e-01_dp, &
       1.600000e-01_dp,  9.000000e-02_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       8.500000e-01_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  1.500000e-01_dp,  -1.000000e+00_dp, &
       1.500000e-01_dp,  8.500000e-01_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  1.500000e-01_dp, &
       -1.000000e+00_dp,  1.500000e-01_dp,  2.720000e-01_dp,  6.280000e-01_dp,  3.700000e-02_dp, &
       6.300000e-02_dp,  -1.000000e+00_dp,  2.500000e-02_dp,  -9.370000e-01_dp,  6.300000e-02_dp, &
       3.800000e-02_dp,  1.000000e-01_dp,  5.780000e-01_dp,  -1.000000e+00_dp,  1.020000e-01_dp, &
       1.020000e-01_dp,  3.300000e-02_dp,  1.870000e-01_dp,  5.780000e-01_dp,  -8.980000e-01_dp, &
       6.800000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  8.500000e-01_dp, &
       7.500000e-02_dp,  -1.000000e+00_dp,  7.500000e-02_dp,  7.500000e-02_dp,  9.250000e-01_dp, &
       7.500000e-02_dp,  -9.250000e-01_dp,  1.500000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  7.500000e-01_dp,  7.500000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.600000e-01_dp,  2.500000e-01_dp,  3.000000e-02_dp,  2.500000e-01_dp, &
       9.000000e-02_dp,  1.600000e-01_dp,  7.500000e-01_dp,  1.600000e-01_dp,  -1.000000e+00_dp, &
       7.000000e-02_dp,  3.500000e-01_dp,  -9.100000e-01_dp,  6.400000e-01_dp,  2.500000e-01_dp, &
       2.500000e-01_dp,  -1.000000e+00_dp,  9.500000e-01_dp,  3.800000e-01_dp,  1.500000e-01_dp, &
       5.400000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_4 = (/ &
       5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  2.000000e-01_dp, &
       -1.000000e+00_dp,  3.000000e-01_dp,  3.000000e-01_dp,  2.500000e-01_dp,  2.500000e-01_dp, &
       -1.000000e+00_dp,  7.500000e-01_dp,  5.000000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  5.000000e-01_dp,  2.400000e-01_dp,  2.400000e-01_dp,  1.220000e+00_dp, &
       3.000000e-01_dp,  -1.000000e+00_dp,  1.800000e-01_dp,  -1.000000e+00_dp,  1.100000e+00_dp, &
       2.800000e-01_dp,  9.000000e-02_dp,  7.500000e-01_dp,  1.110000e+00_dp,  -2.000000e+00_dp, &
       2.900000e-01_dp,  2.900000e-01_dp,  9.100000e-01_dp,  4.500000e-01_dp,  9.000000e-02_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  1.300000e-01_dp,  -1.000000e+00_dp,  9.500000e-01_dp, &
       2.900000e-01_dp,  1.800000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  3.300000e-01_dp, &
       1.000000e+00_dp,  2.500000e-01_dp,  2.500000e-01_dp,  3.600000e-01_dp,  -1.000000e+00_dp, &
       8.900000e-01_dp,  1.400000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  3.600000e-01_dp, &
       6.400000e-01_dp,  1.500000e-01_dp,  1.255000e+00_dp,  2.550000e-01_dp,  -1.000000e+00_dp, &
       5.950000e-01_dp,  -1.000000e+00_dp,  5.950000e-01_dp,  1.700000e+00_dp,  3.750000e-01_dp, &
       -1.000000e+00_dp,  6.250000e-01_dp,  3.750000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp, &
       3.750000e-01_dp,  3.750000e-01_dp,  3.750000e-01_dp,  7.500000e-01_dp,  2.500000e-01_dp, &
       2.500000e-01_dp,  -1.000000e+00_dp,  7.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       2.500000e-01_dp,  2.500000e-01_dp,  7.850000e-01_dp,  6.000000e-01_dp,  1.150000e-01_dp, &
       -1.000000e+00_dp,  1.800000e-02_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  9.000000e-01_dp, &
       1.800000e-02_dp,  2.500000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  1.250000e+00_dp, &
       5.000000e-01_dp,  2.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp, &
       2.000000e+00_dp,  1.000000e+00_dp,  -2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  4.100000e-01_dp,  1.500000e-01_dp, &
       4.400000e-01_dp,  -1.000000e+00_dp,  1.500000e-01_dp,  -1.000000e+00_dp,  4.400000e-01_dp, &
       1.500000e-01_dp,  4.100000e-01_dp,  4.400000e-01_dp,  -1.000000e+00_dp,  1.500000e-01_dp, &
       -1.000000e+00_dp,  4.400000e-01_dp,  4.100000e-01_dp,  5.900000e-01_dp,  -1.000000e+00_dp, &
       3.900000e-01_dp,  1.500000e-01_dp,  3.900000e-01_dp,  -1.000000e+00_dp,  4.400000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e-01_dp,  1.200000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_5 = (/ &
       1.200000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  2.800000e-01_dp, &
       -1.000000e+00_dp,  5.600000e-01_dp,  2.800000e-01_dp,  3.600000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  7.810000e-01_dp, &
       1.900000e-01_dp,  -1.000000e+00_dp,  1.900000e-01_dp,  3.000000e-02_dp,  3.000000e-02_dp, &
       8.100000e-01_dp,  1.900000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  3.610000e-01_dp, &
       1.340000e-01_dp,  1.340000e-01_dp,  1.340000e-01_dp,  -1.000000e+00_dp,  7.320000e-01_dp, &
       5.050000e-01_dp,  7.730000e-01_dp,  -7.730000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  5.300000e-01_dp, &
       4.700000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  6.500000e-01_dp,  3.500000e-01_dp,  -1.000000e+00_dp,  4.400000e-02_dp, &
       4.400000e-02_dp,  1.100000e-01_dp,  -1.000000e+00_dp,  1.020000e-01_dp,  5.400000e-02_dp, &
       4.560000e-01_dp,  3.000000e-01_dp,  5.100000e-02_dp,  1.050000e-01_dp,  -1.000000e+00_dp, &
       4.950000e-01_dp,  2.370000e-01_dp,  2.430000e-01_dp,  2.000000e-01_dp,  1.200000e-01_dp, &
       1.200000e-01_dp,  6.000000e-01_dp,  1.000000e-01_dp,  5.000000e-01_dp,  2.800000e-01_dp, &
       -1.000000e+00_dp,  5.600000e-01_dp,  2.800000e-01_dp,  3.600000e-01_dp,  -1.000000e+00_dp, &
       2.200000e-02_dp,  3.260000e-01_dp,  1.200000e-01_dp,  8.800000e-01_dp,  -1.000000e+00_dp, &
       9.800000e-02_dp,  -1.000000e+00_dp,  6.250000e-01_dp,  1.410000e-01_dp,  2.390000e-01_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_6 = (/ &
       5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       2.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  3.600000e-01_dp,  6.400000e-01_dp,  -3.600000e-01_dp, &
       -1.000000e+00_dp,  2.090000e-01_dp,  7.910000e-01_dp,  -2.090000e-01_dp,  -1.000000e+00_dp, &
       3.600000e-01_dp,  6.400000e-01_dp,  -3.600000e-01_dp,  -1.000000e+00_dp,  3.600000e-01_dp, &
       6.400000e-01_dp,  -3.600000e-01_dp,  -1.000000e+00_dp,  7.910000e-01_dp,  2.090000e-01_dp, &
       -2.090000e-01_dp,  -1.000000e+00_dp,  2.090000e-01_dp,  7.910000e-01_dp,  -2.090000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  2.090000e-01_dp, &
       7.910000e-01_dp,  -2.090000e-01_dp,  7.000000e-03_dp,  -1.000000e+00_dp,  2.430000e-01_dp, &
       7.500000e-01_dp,  -8.750000e-01_dp,  7.000000e-03_dp,  -1.000000e+00_dp,  5.130000e-01_dp, &
       4.800000e-01_dp,  -7.400000e-01_dp,  7.000000e-03_dp,  -1.000000e+00_dp,  7.430000e-01_dp, &
       2.500000e-01_dp,  -6.250000e-01_dp,  7.000000e-03_dp,  5.780000e-01_dp,  2.720000e-01_dp, &
       -1.000000e+00_dp,  1.430000e-01_dp,  -1.500000e-01_dp,  6.800000e-01_dp,  3.200000e-01_dp, &
       -1.000000e+00_dp,  7.000000e-03_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  4.930000e-01_dp, &
       -5.000000e-01_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.172000e+00_dp,  2.780000e-01_dp,  4.400000e-01_dp,  -1.000000e+00_dp, &
       8.500000e-02_dp,  2.500000e-02_dp,  3.750000e-01_dp,  8.500000e-02_dp,  8.500000e-02_dp, &
       6.000000e-01_dp,  -1.750000e-01_dp,  1.125000e+00_dp,  8.580000e-01_dp,  1.420000e-01_dp, &
       4.730000e-01_dp,  -1.000000e+00_dp,  8.800000e-02_dp,  8.800000e-02_dp,  3.750000e-01_dp, &
       8.800000e-02_dp,  1.170000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  6.780000e-01_dp, &
       8.250000e-01_dp,  1.250000e-01_dp,  -1.000000e+00_dp,  6.540000e-01_dp,  3.460000e-01_dp, &
       -3.460000e-01_dp,  -1.000000e+00_dp,  2.090000e-01_dp,  7.910000e-01_dp,  -2.090000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_7 = (/ &
       1.000000e+00_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  3.000000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  7.000000e-01_dp,  -1.000000e+00_dp,  7.000000e-01_dp,  7.000000e-01_dp, &
       2.000000e+00_dp,  -2.000000e+00_dp,  2.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       5.500000e-02_dp,  5.500000e-02_dp,  5.000000e-01_dp,  4.450000e-01_dp,  5.000000e-01_dp, &
       -1.000000e+00_dp,  4.450000e-01_dp,  -1.000000e+00_dp,  8.900000e-01_dp,  4.450000e-01_dp, &
       8.900000e-01_dp,  2.000000e+00_dp,  -2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       3.200000e-01_dp,  5.000000e-02_dp,  1.800000e-01_dp,  3.200000e-01_dp,  3.200000e-01_dp, &
       -1.000000e+00_dp,  1.300000e-01_dp,  1.900000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       2.700000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.130000e-01_dp,  7.470000e-01_dp, &
       1.400000e-01_dp,  -1.000000e+00_dp,  2.940000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       8.870000e-01_dp,  4.530000e-01_dp,  1.700000e-01_dp,  2.900000e-01_dp,  2.160000e-01_dp, &
       2.340000e-01_dp,  -1.000000e+00_dp,  2.340000e-01_dp,  2.160000e-01_dp,  9.000000e-02_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  9.000000e-02_dp,  1.000000e+00_dp,  6.000000e-01_dp, &
       -1.000000e+00_dp,  4.000000e-01_dp,  4.000000e-01_dp,  1.000000e+00_dp,  -4.000000e-01_dp, &
       4.000000e-01_dp,  1.430000e-01_dp,  1.430000e-01_dp,  -1.000000e+00_dp,  8.570000e-01_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  8.570000e-01_dp,  8.500000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       3.900000e-01_dp,  7.500000e-01_dp,  3.000000e-01_dp,  5.700000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp, &
       5.000000e-01_dp,  5.000000e-01_dp,  7.000000e-02_dp,  7.000000e-01_dp,  2.300000e-01_dp, &
       -1.000000e+00_dp,  3.500000e-02_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  3.000000e-01_dp, &
       8.000000e-01_dp,  3.500000e-02_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_8 = (/ &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  3.600000e-01_dp,  1.600000e-01_dp,  -1.000000e+00_dp, &
       4.100000e-01_dp,  2.100000e-01_dp,  3.200000e-01_dp,  4.200000e-01_dp,  6.200000e-01_dp, &
       -1.000000e+00_dp,  2.100000e-01_dp,  5.000000e-02_dp,  5.000000e-02_dp,  6.300000e-01_dp, &
       9.000000e-02_dp,  2.600000e-01_dp,  3.000000e-01_dp,  2.400000e-01_dp,  6.000000e-02_dp, &
       3.800000e-01_dp,  2.400000e-01_dp,  -1.000000e+00_dp,  2.000000e-01_dp,  4.200000e-01_dp, &
       1.000000e-01_dp,  6.000000e-02_dp,  -1.000000e+00_dp,  3.700000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.700000e-01_dp,  2.900000e-01_dp,  2.160000e-01_dp, &
       2.340000e-01_dp,  -1.000000e+00_dp,  2.340000e-01_dp,  2.160000e-01_dp,  9.000000e-02_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  9.000000e-02_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e-01_dp,  9.000000e-01_dp,  -1.000000e+00_dp, &
       9.000000e-01_dp,  -1.000000e-01_dp,  9.000000e-01_dp,  1.000000e-01_dp,  9.000000e-01_dp, &
       -1.000000e+00_dp,  1.000000e-01_dp,  -1.000000e+00_dp,  6.700000e-02_dp,  3.300000e-02_dp, &
       -1.000000e+00_dp,  9.000000e-01_dp,  1.000000e-01_dp,  -1.000000e+00_dp,  2.700000e-01_dp, &
       5.700000e-02_dp,  2.100000e-01_dp,  7.500000e-02_dp,  -9.430000e-01_dp,  1.900000e-02_dp, &
       3.000000e-01_dp,  3.000000e-01_dp,  1.500000e-01_dp,  2.700000e-01_dp,  -1.000000e+00_dp, &
       7.900000e-01_dp,  6.100000e-01_dp,  5.000000e-01_dp,  2.000000e-01_dp,  6.000000e-02_dp, &
       -1.000000e+00_dp,  1.000000e-02_dp,  2.300000e-01_dp,  2.300000e-01_dp,  7.000000e-02_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_9 = (/ &
       2.000000e-01_dp,  -5.000000e-01_dp,  5.000000e-01_dp,  2.100000e-01_dp,  2.600000e-01_dp, &
       4.400000e-01_dp,  -1.000000e+00_dp,  9.000000e-02_dp,  7.000000e-01_dp,  9.000000e-02_dp, &
       -1.000000e+00_dp,  8.800000e-01_dp,  6.900000e-01_dp,  5.100000e-01_dp,  1.600000e-01_dp, &
       2.800000e-01_dp,  -1.000000e+00_dp,  6.000000e-02_dp,  4.400000e-01_dp,  6.000000e-02_dp, &
       6.000000e-02_dp,  -5.600000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp,  1.930000e-01_dp, &
       1.930000e-01_dp,  6.120000e-01_dp,  -3.880000e-01_dp,  3.500000e-01_dp,  6.500000e-01_dp, &
       -1.000000e+00_dp,  3.500000e-01_dp,  6.500000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  9.300000e-01_dp,  7.000000e-02_dp, &
       -1.000000e+00_dp,  8.000000e-02_dp,  8.000000e-02_dp,  7.000000e-02_dp,  8.500000e-01_dp, &
       -1.000000e+00_dp,  1.850000e+00_dp,  1.500000e-01_dp,  9.300000e-01_dp,  7.000000e-02_dp, &
       -1.000000e+00_dp,  8.000000e-02_dp,  8.000000e-02_dp,  7.000000e-02_dp,  8.500000e-01_dp, &
       8.500000e-01_dp,  1.500000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  1.500000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  4.800000e-01_dp,  5.200000e-01_dp,  5.200000e-01_dp, &
       4.800000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  8.500000e-01_dp,  -1.000000e+00_dp,  7.200000e-02_dp, &
       7.800000e-02_dp,  7.800000e-02_dp,  7.200000e-02_dp,  -8.500000e-01_dp,  1.500000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       5.000000e-01_dp,  -5.000000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_10 = (/ &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  5.000000e-01_dp,  -1.000000e+00_dp, &
       8.500000e-02_dp,  -1.000000e+00_dp,  3.650000e-01_dp,  8.500000e-02_dp,  5.500000e-01_dp, &
       5.500000e-01_dp,  8.500000e-02_dp,  5.500000e-01_dp,  -3.650000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  8.800000e-01_dp, &
       1.200000e-01_dp,  8.800000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  3.000000e-01_dp, &
       7.000000e-01_dp,  7.000000e-01_dp,  3.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  8.500000e-01_dp,  1.500000e-01_dp, &
       -1.000000e+00_dp,  1.500000e-01_dp,  8.500000e-01_dp,  1.000000e-01_dp,  -1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_11 = (/ &
       9.000000e-01_dp,  1.000000e+00_dp,  1.730000e+00_dp,  7.000000e-02_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  5.000000e-03_dp,  -1.000000e+00_dp,  7.100000e-01_dp, &
       2.750000e-01_dp,  2.850000e-01_dp,  9.850000e-01_dp,  9.850000e-01_dp,  4.250000e-01_dp, &
       5.000000e-03_dp,  -1.000000e+00_dp,  7.100000e-01_dp,  2.750000e-01_dp,  2.850000e-01_dp, &
       9.850000e-01_dp,  9.850000e-01_dp,  4.250000e-01_dp,  5.000000e-03_dp,  -1.000000e+00_dp, &
       7.100000e-01_dp,  2.750000e-01_dp,  2.850000e-01_dp,  9.850000e-01_dp,  9.850000e-01_dp, &
       4.250000e-01_dp,  1.900000e-01_dp,  -1.000000e+00_dp,  2.600000e-01_dp,  5.800000e-01_dp, &
       3.600000e-01_dp,  6.700000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       7.000000e-01_dp,  3.000000e-01_dp,  3.000000e-01_dp,  7.000000e-01_dp,  3.000000e-01_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  5.000000e-01_dp,  1.000000e+00_dp,  5.000000e-01_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  3.200000e-01_dp,  5.000000e-02_dp,  1.800000e-01_dp,  3.200000e-01_dp, &
       3.200000e-01_dp,  -1.000000e+00_dp,  1.300000e-01_dp,  1.900000e-01_dp,  1.800000e-01_dp, &
       1.000000e+00_dp,  2.700000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  5.000000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       5.000000e-01_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_12 = (/ &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  4.000000e-01_dp,  6.000000e-01_dp, &
       -1.000000e+00_dp,  4.000000e-01_dp,  4.000000e-01_dp,  6.000000e-01_dp,  4.000000e-01_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp, &
       1.100000e-01_dp,  5.000000e-01_dp,  3.900000e-01_dp,  1.100000e-01_dp,  1.890000e+00_dp, &
       8.900000e-01_dp,  2.000000e+00_dp,  2.500000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  2.500000e-01_dp,  5.000000e-01_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  5.300000e-01_dp,  -1.000000e+00_dp,  5.300000e-01_dp,  4.700000e-01_dp, &
       5.300000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.800000e-01_dp,  -1.000000e+00_dp, &
       1.800000e-01_dp,  8.200000e-01_dp,  1.800000e-01_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e-01_dp,  7.000000e-01_dp,  2.000000e-01_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_13 = (/ &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_14 = (/ &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       2.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_15 = (/ &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(150) :: STOICM_16 = (/ &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(54) :: STOICM_17 = (/ &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  -1.000000e+00_dp, &
       1.000000e+00_dp,  -1.000000e+00_dp,  2.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp, &
       1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp,  1.000000e+00_dp,  -1.000000e+00_dp, &
       -1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp,  1.000000e+00_dp /)
  REAL(kind=dp), PARAMETER, DIMENSION(2604) :: STOICM = (/&
    STOICM_0, STOICM_1, STOICM_2, STOICM_3, STOICM_4, &
    STOICM_5, STOICM_6, STOICM_7, STOICM_8, STOICM_9, &
    STOICM_10, STOICM_11, STOICM_12, STOICM_13, STOICM_14, &
    STOICM_15, STOICM_16, STOICM_17 /)


END MODULE aromatics_kpp_StoichiomSP

